home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 10 / AACD 10.iso / AACD / Programming / AmigaTalk / general / Symbol.st < prev    next >
Text File  |  2000-02-13  |  236b  |  13 lines
  1. Class Symbol :Object
  2. [
  3.    == aSymbol
  4.       ^ <primitive 6 self aSymbol >
  5.          ifTrue:  [<primitive 91 self aSymbol >]
  6.          ifFalse: [false]
  7. |
  8.    printString
  9.       ^ <primitive 92 self>
  10. |
  11.    asString
  12.       ^ <primitive 93 self>
  13. ]